program MyWidget;

uses
  Vcl.Forms,
  Main in '..\Unit\Main.pas' {fMain},
  MenuWidget in '..\Widget\MenuWidget.pas' {frMenu: TFrame},
  MenuItemWidget in '..\Widget\MenuItemWidget.pas' {frMenuItem: TFrame},
  MsgWidget in '..\Widget\MsgWidget.pas',
  TabWidget in '..\Widget\TabWidget.pas' {frTab: TFrame},
  MenuButton in '..\Widget\MenuButton.pas' {frMenuButton: TFrame},
  HeadWidget in '..\Widget\HeadWidget.pas' {frHead: TFrame},
  User in '..\Unit\User.pas' {fUser},
  Order in '..\Unit\Order.pas' {fOrder},
  BaseFrom in '..\Unit\BaseFrom.pas' {fBaseForm},
  Login in '..\Unit\Login.pas' {fLogin},
  ImgBtnWidget in '..\Widget\ImgBtnWidget.pas' {frImgBtn: TFrame},
  ImgEdit in '..\Widget\ImgEdit.pas' {fImgEdit: TFrame};

{$R *.res}

begin
  Application.Initialize;
  ReportMemoryLeaksOnShutdown := true;
  Application.MainFormOnTaskbar := True;
  fLogin := TfLogin.Create(nil);
  try
    if fLogin.ShowModal = 1 then
    begin
      Application.CreateForm(TfMain, fMain);
    end;
  finally
    fLogin.Free;
  end;

  Application.Run;
end.

